home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Softwarová Záchrana 3
/
Softwarova-zachrana-3.bin
/
Xteq X-Setup
/
xqdcXSP-Setup-EN.exe
/
{app}
/
plugins
/
XQ TrueType Cache Clear 1.xpl
< prev
next >
Wrap
Text File
|
2003-11-19
|
963b
|
40 lines
"FILE"="Xteq Systems X-Setup Plugin 6.0"
"TYPE"="5"
"COUNT"="1"
"UIPATH"="Appearance\Interface\TrueType Fonts"
"NAME"="TrueType Fonts Cache Clear"
"VERSION"="1.46"
"OSVERSION"="1010100"
"LANGUAGE"="VBScript"
"TEXT 1"="Clear Font Cache"
"DESCRIPTION 1"="Click on the button to clear the automatically generated font cache."
"AUTHOR"="Xteq Systems"
"CONTACTURL"="http://www.xteq.com"
"COPYRIGHT"="Copyright Xteq Systems - All Rights Reserved"
"COMMENT 1"=" "
Sub Plugin_Initialize
End Sub
Sub Plugin_CheckData(ElementIndex)
End Sub
Sub Plugin_Apply(ElementIndex,ElementSubIndex)
s=GetWinDir
s=s & "ttfCache"
if FileExists(s) then
Call FileSetAttribute(s,"R-")
Call FileSetAttribute(s,"H-")
Call FileSetAttribute(s,"R-")
Call FileDelete(s)
Call MsgInformation("Font Cache has been cleared")
else
Call MsgError("The Font Cache is already empty!")
end if
End Sub
Sub Plugin_Terminate
End Sub